library(“dplyr”) library(“stringr”) library(“ggplot2”) library(‘tidyverse’)

spl_df <- read.csv(“~/Desktop/2022-2023-All-Checkouts-SPL-Data.csv”, stringsAsFactors = FALSE)

Introduction

This dataset presents monthly checkout data for the Seattle Public Library by physical and electronic item title from the beginning of 2022 through January 2023. I chose to analyze the monthly checkout data for the least and most checked out books ‘A” is for alibi / Sue Grafton’, ‘Headphones / Seattle Public Library’ by month to show the changing trends in people’s preferences for different books (most and least liked). I also chose three more mainstream forms of material: books, e-books, and videos to analyze to see how people check out for these three forms (which materials people are more likely and less likely to buy).

Summary Information

The average number of checkouts per book at Seattle Central Library from 2022 to January 2023 was 3.335852, with people most willing to spend money on the physical book ‘Headphones’ with an average of 1,627.308 checkouts per month. The month in which people bought the most copies of this book was January 2023, and people purchased this book at the Seattle Public Library a total of 21,155 times. The books that people are least likely to buy include many books, such as ‘“A” is for alibi’, with an average of one checkout per month.

## [1] "The average checkout is 3.33585212117167"
## [1] "Headphones / Seattle Public Library."
## [1] "\"A\" is for alibi / Sue Grafton."
## [1] "2023-01-01"
## [1] "21155"

The Dataset

Your Choice

With this graph, I want to see the trend of people’s purchases of all Seattle Public Library publications in 2022 and 2023. Overall, people’s purchases of volume fluctuates a lot. People purchased the least in February and April of 2022, at 650K/month. But then the number of purchases made by people overall increased. Finally, in January 2023, people’s purchases rose to 800K books per month.